home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / ABUSESRC.ZIP / AbuseSrc / macabuse / inc / stack.hpp < prev    next >
C/C++ Source or Header  |  1997-05-20  |  760b  |  42 lines
  1. #ifndef __STACK_HPP_
  2. #define __STACK_HPP_
  3.  
  4. #ifndef NO_LIBS
  5. #include "jmalloc.hpp"
  6.  
  7. #include "dprint.hpp"
  8. #else
  9. #include "fakelib.hpp"
  10. #endif
  11.  
  12. #include <stdio.h>
  13. struct cons_cell;
  14.  
  15. template<class T> class grow_stack        // stack does not shrink
  16. { 
  17.   public :
  18.   T **sdata;
  19.   long son;
  20.  
  21.   grow_stack(int max_size) { sdata=(T **)jmalloc(max_size,"pointer stack");  son=0; }
  22.   void push(T *data) 
  23.   {
  24.     sdata[son]=data;
  25.     son++;
  26.   }
  27.    
  28.   T *pop(long total) 
  29.   { if (total>son) { lbreak("stack underflow\n"); exit(0); }
  30.     son-=total;
  31.     return sdata[son];
  32.   }
  33.   void clean_up() 
  34.   { 
  35.     if (son!=0) dprintf("Warning cleaning up stack and not empty\n");
  36.     jfree(sdata); 
  37.     sdata=NULL;  son=0; 
  38.   }
  39. } ;
  40.  
  41. #endif
  42.